\(\int \frac {1}{x^4 (c+a^2 c x^2)^2 \arctan (a x)^3} \, dx\) [634]

   Optimal result
   Rubi [N/A]
   Mathematica [N/A]
   Maple [N/A] (verified)
   Fricas [N/A]
   Sympy [N/A]
   Maxima [N/A]
   Giac [N/A]
   Mupad [N/A]

Optimal result

Integrand size = 22, antiderivative size = 22 \[ \int \frac {1}{x^4 \left (c+a^2 c x^2\right )^2 \arctan (a x)^3} \, dx=-\frac {1}{2 a c^2 x^4 \arctan (a x)^2}+\frac {a}{2 c^2 x^2 \arctan (a x)^2}-\frac {a^3}{2 c^2 \left (1+a^2 x^2\right ) \arctan (a x)^2}+\frac {a^4 x}{c^2 \left (1+a^2 x^2\right ) \arctan (a x)}-\frac {a^3 \operatorname {CosIntegral}(2 \arctan (a x))}{c^2}-\frac {2 \text {Int}\left (\frac {1}{x^5 \arctan (a x)^2},x\right )}{a c^2}+\frac {a \text {Int}\left (\frac {1}{x^3 \arctan (a x)^2},x\right )}{c^2} \]

[Out]

-1/2/a/c^2/x^4/arctan(a*x)^2+1/2*a/c^2/x^2/arctan(a*x)^2-1/2*a^3/c^2/(a^2*x^2+1)/arctan(a*x)^2+a^4*x/c^2/(a^2*
x^2+1)/arctan(a*x)-a^3*Ci(2*arctan(a*x))/c^2-2*Unintegrable(1/x^5/arctan(a*x)^2,x)/a/c^2+a*Unintegrable(1/x^3/
arctan(a*x)^2,x)/c^2

Rubi [N/A]

Not integrable

Time = 0.41 (sec) , antiderivative size = 22, normalized size of antiderivative = 1.00, number of steps used = 0, number of rules used = 0, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.000, Rules used = {} \[ \int \frac {1}{x^4 \left (c+a^2 c x^2\right )^2 \arctan (a x)^3} \, dx=\int \frac {1}{x^4 \left (c+a^2 c x^2\right )^2 \arctan (a x)^3} \, dx \]

[In]

Int[1/(x^4*(c + a^2*c*x^2)^2*ArcTan[a*x]^3),x]

[Out]

-1/2*1/(a*c^2*x^4*ArcTan[a*x]^2) + a/(2*c^2*x^2*ArcTan[a*x]^2) - a^3/(2*c^2*(1 + a^2*x^2)*ArcTan[a*x]^2) + (a^
4*x)/(c^2*(1 + a^2*x^2)*ArcTan[a*x]) - (a^3*CosIntegral[2*ArcTan[a*x]])/c^2 - (2*Defer[Int][1/(x^5*ArcTan[a*x]
^2), x])/(a*c^2) + (a*Defer[Int][1/(x^3*ArcTan[a*x]^2), x])/c^2

Rubi steps \begin{align*} \text {integral}& = -\left (a^2 \int \frac {1}{x^2 \left (c+a^2 c x^2\right )^2 \arctan (a x)^3} \, dx\right )+\frac {\int \frac {1}{x^4 \left (c+a^2 c x^2\right ) \arctan (a x)^3} \, dx}{c} \\ & = -\frac {1}{2 a c^2 x^4 \arctan (a x)^2}+a^4 \int \frac {1}{\left (c+a^2 c x^2\right )^2 \arctan (a x)^3} \, dx-\frac {2 \int \frac {1}{x^5 \arctan (a x)^2} \, dx}{a c^2}-\frac {a^2 \int \frac {1}{x^2 \left (c+a^2 c x^2\right ) \arctan (a x)^3} \, dx}{c} \\ & = -\frac {1}{2 a c^2 x^4 \arctan (a x)^2}+\frac {a}{2 c^2 x^2 \arctan (a x)^2}-\frac {a^3}{2 c^2 \left (1+a^2 x^2\right ) \arctan (a x)^2}-a^5 \int \frac {x}{\left (c+a^2 c x^2\right )^2 \arctan (a x)^2} \, dx-\frac {2 \int \frac {1}{x^5 \arctan (a x)^2} \, dx}{a c^2}+\frac {a \int \frac {1}{x^3 \arctan (a x)^2} \, dx}{c^2} \\ & = -\frac {1}{2 a c^2 x^4 \arctan (a x)^2}+\frac {a}{2 c^2 x^2 \arctan (a x)^2}-\frac {a^3}{2 c^2 \left (1+a^2 x^2\right ) \arctan (a x)^2}+\frac {a^4 x}{c^2 \left (1+a^2 x^2\right ) \arctan (a x)}-a^4 \int \frac {1}{\left (c+a^2 c x^2\right )^2 \arctan (a x)} \, dx+a^6 \int \frac {x^2}{\left (c+a^2 c x^2\right )^2 \arctan (a x)} \, dx-\frac {2 \int \frac {1}{x^5 \arctan (a x)^2} \, dx}{a c^2}+\frac {a \int \frac {1}{x^3 \arctan (a x)^2} \, dx}{c^2} \\ & = -\frac {1}{2 a c^2 x^4 \arctan (a x)^2}+\frac {a}{2 c^2 x^2 \arctan (a x)^2}-\frac {a^3}{2 c^2 \left (1+a^2 x^2\right ) \arctan (a x)^2}+\frac {a^4 x}{c^2 \left (1+a^2 x^2\right ) \arctan (a x)}-\frac {2 \int \frac {1}{x^5 \arctan (a x)^2} \, dx}{a c^2}+\frac {a \int \frac {1}{x^3 \arctan (a x)^2} \, dx}{c^2}-\frac {a^3 \text {Subst}\left (\int \frac {\cos ^2(x)}{x} \, dx,x,\arctan (a x)\right )}{c^2}+\frac {a^3 \text {Subst}\left (\int \frac {\sin ^2(x)}{x} \, dx,x,\arctan (a x)\right )}{c^2} \\ & = -\frac {1}{2 a c^2 x^4 \arctan (a x)^2}+\frac {a}{2 c^2 x^2 \arctan (a x)^2}-\frac {a^3}{2 c^2 \left (1+a^2 x^2\right ) \arctan (a x)^2}+\frac {a^4 x}{c^2 \left (1+a^2 x^2\right ) \arctan (a x)}-\frac {2 \int \frac {1}{x^5 \arctan (a x)^2} \, dx}{a c^2}+\frac {a \int \frac {1}{x^3 \arctan (a x)^2} \, dx}{c^2}+\frac {a^3 \text {Subst}\left (\int \left (\frac {1}{2 x}-\frac {\cos (2 x)}{2 x}\right ) \, dx,x,\arctan (a x)\right )}{c^2}-\frac {a^3 \text {Subst}\left (\int \left (\frac {1}{2 x}+\frac {\cos (2 x)}{2 x}\right ) \, dx,x,\arctan (a x)\right )}{c^2} \\ & = -\frac {1}{2 a c^2 x^4 \arctan (a x)^2}+\frac {a}{2 c^2 x^2 \arctan (a x)^2}-\frac {a^3}{2 c^2 \left (1+a^2 x^2\right ) \arctan (a x)^2}+\frac {a^4 x}{c^2 \left (1+a^2 x^2\right ) \arctan (a x)}-\frac {2 \int \frac {1}{x^5 \arctan (a x)^2} \, dx}{a c^2}+\frac {a \int \frac {1}{x^3 \arctan (a x)^2} \, dx}{c^2}-2 \frac {a^3 \text {Subst}\left (\int \frac {\cos (2 x)}{x} \, dx,x,\arctan (a x)\right )}{2 c^2} \\ & = -\frac {1}{2 a c^2 x^4 \arctan (a x)^2}+\frac {a}{2 c^2 x^2 \arctan (a x)^2}-\frac {a^3}{2 c^2 \left (1+a^2 x^2\right ) \arctan (a x)^2}+\frac {a^4 x}{c^2 \left (1+a^2 x^2\right ) \arctan (a x)}-\frac {a^3 \operatorname {CosIntegral}(2 \arctan (a x))}{c^2}-\frac {2 \int \frac {1}{x^5 \arctan (a x)^2} \, dx}{a c^2}+\frac {a \int \frac {1}{x^3 \arctan (a x)^2} \, dx}{c^2} \\ \end{align*}

Mathematica [N/A]

Not integrable

Time = 5.70 (sec) , antiderivative size = 24, normalized size of antiderivative = 1.09 \[ \int \frac {1}{x^4 \left (c+a^2 c x^2\right )^2 \arctan (a x)^3} \, dx=\int \frac {1}{x^4 \left (c+a^2 c x^2\right )^2 \arctan (a x)^3} \, dx \]

[In]

Integrate[1/(x^4*(c + a^2*c*x^2)^2*ArcTan[a*x]^3),x]

[Out]

Integrate[1/(x^4*(c + a^2*c*x^2)^2*ArcTan[a*x]^3), x]

Maple [N/A] (verified)

Not integrable

Time = 32.50 (sec) , antiderivative size = 22, normalized size of antiderivative = 1.00

\[\int \frac {1}{x^{4} \left (a^{2} c \,x^{2}+c \right )^{2} \arctan \left (a x \right )^{3}}d x\]

[In]

int(1/x^4/(a^2*c*x^2+c)^2/arctan(a*x)^3,x)

[Out]

int(1/x^4/(a^2*c*x^2+c)^2/arctan(a*x)^3,x)

Fricas [N/A]

Not integrable

Time = 0.24 (sec) , antiderivative size = 40, normalized size of antiderivative = 1.82 \[ \int \frac {1}{x^4 \left (c+a^2 c x^2\right )^2 \arctan (a x)^3} \, dx=\int { \frac {1}{{\left (a^{2} c x^{2} + c\right )}^{2} x^{4} \arctan \left (a x\right )^{3}} \,d x } \]

[In]

integrate(1/x^4/(a^2*c*x^2+c)^2/arctan(a*x)^3,x, algorithm="fricas")

[Out]

integral(1/((a^4*c^2*x^8 + 2*a^2*c^2*x^6 + c^2*x^4)*arctan(a*x)^3), x)

Sympy [N/A]

Not integrable

Time = 1.83 (sec) , antiderivative size = 44, normalized size of antiderivative = 2.00 \[ \int \frac {1}{x^4 \left (c+a^2 c x^2\right )^2 \arctan (a x)^3} \, dx=\frac {\int \frac {1}{a^{4} x^{8} \operatorname {atan}^{3}{\left (a x \right )} + 2 a^{2} x^{6} \operatorname {atan}^{3}{\left (a x \right )} + x^{4} \operatorname {atan}^{3}{\left (a x \right )}}\, dx}{c^{2}} \]

[In]

integrate(1/x**4/(a**2*c*x**2+c)**2/atan(a*x)**3,x)

[Out]

Integral(1/(a**4*x**8*atan(a*x)**3 + 2*a**2*x**6*atan(a*x)**3 + x**4*atan(a*x)**3), x)/c**2

Maxima [N/A]

Not integrable

Time = 0.38 (sec) , antiderivative size = 142, normalized size of antiderivative = 6.45 \[ \int \frac {1}{x^4 \left (c+a^2 c x^2\right )^2 \arctan (a x)^3} \, dx=\int { \frac {1}{{\left (a^{2} c x^{2} + c\right )}^{2} x^{4} \arctan \left (a x\right )^{3}} \,d x } \]

[In]

integrate(1/x^4/(a^2*c*x^2+c)^2/arctan(a*x)^3,x, algorithm="maxima")

[Out]

1/2*(2*(a^4*c^2*x^7 + a^2*c^2*x^5)*arctan(a*x)^2*integrate((15*a^4*x^4 + 23*a^2*x^2 + 10)/((a^6*c^2*x^10 + 2*a
^4*c^2*x^8 + a^2*c^2*x^6)*arctan(a*x)), x) - a*x + 2*(3*a^2*x^2 + 2)*arctan(a*x))/((a^4*c^2*x^7 + a^2*c^2*x^5)
*arctan(a*x)^2)

Giac [N/A]

Not integrable

Time = 127.47 (sec) , antiderivative size = 3, normalized size of antiderivative = 0.14 \[ \int \frac {1}{x^4 \left (c+a^2 c x^2\right )^2 \arctan (a x)^3} \, dx=\int { \frac {1}{{\left (a^{2} c x^{2} + c\right )}^{2} x^{4} \arctan \left (a x\right )^{3}} \,d x } \]

[In]

integrate(1/x^4/(a^2*c*x^2+c)^2/arctan(a*x)^3,x, algorithm="giac")

[Out]

sage0*x

Mupad [N/A]

Not integrable

Time = 0.46 (sec) , antiderivative size = 24, normalized size of antiderivative = 1.09 \[ \int \frac {1}{x^4 \left (c+a^2 c x^2\right )^2 \arctan (a x)^3} \, dx=\int \frac {1}{x^4\,{\mathrm {atan}\left (a\,x\right )}^3\,{\left (c\,a^2\,x^2+c\right )}^2} \,d x \]

[In]

int(1/(x^4*atan(a*x)^3*(c + a^2*c*x^2)^2),x)

[Out]

int(1/(x^4*atan(a*x)^3*(c + a^2*c*x^2)^2), x)